object Form1: TForm1
  Left = 200
  Top = 102
  Width = 522
  Height = 376
  Caption = 'Un-sorted'
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  PixelsPerInch = 96
  OnCreate = FormCreate
  TextHeight = 16
  object DataGrid1: TDataGrid
    Left = 0
    Top = 117
    Width = 510
    Height = 228
    Align = alClient
    ColCount = 2
    DataSource = ODBCQuery1
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goColSizing, goEditing, goTabs]
    RowCount = 2
    ColWidths = (
      10
      110)
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 510
    Height = 117
    Align = alTop
    TabOrder = 1
    object Label1: TLabel
      Left = 16
      Top = 8
      Width = 89
      Height = 16
      Caption = 'Search Value:'
    end
    object ListBox1: TListBox
      Left = 354
      Top = 1
      Width = 155
      Height = 115
      Align = alRight
      ItemHeight = 16
      MultiSelect = True
      TabOrder = 0
      OnClick = ListBox1Click
    end
    object Memo1: TMemo
      Left = 229
      Top = 1
      Width = 125
      Height = 115
      Align = alRight
      BorderStyle = bsNone
      Ctl3D = False
      Lines.Strings = (
        ''
        'Choose sort fields')
      ParentColor = True
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 1
    end
    object ClearSort: TBitBtn
      Left = 8
      Top = 32
      Width = 99
      Height = 33
      Caption = 'Clear Sort Str'
      TabOrder = 2
      OnClick = ClearSortClick
    end
    object ReSort: TBitBtn
      Left = 8
      Top = 69
      Width = 99
      Height = 33
      Caption = 'Re-Sort'
      TabOrder = 3
      OnClick = ReSortClick
    end
    object Find: TButton
      Left = 118
      Top = 31
      Width = 99
      Height = 33
      Caption = 'Find'
      TabOrder = 4
      OnClick = FindClick
    end
    object Edit1: TEdit
      Left = 120
      Top = 4
      Width = 92
      Height = 24
      TabOrder = 5
      Text = '1995/7/2'
    end
  end
  object ODBCCon1: TODBCCon
    Connected = False
    ConnectionMethod = cmConnect
    DataSource = 'InterBase'
    Left = 390
    Top = 6
  end
  object ODBCQuery1: TODBCQuery
    Active = False
    Connection = 'InterBase'
    SQL.Strings = (
      'select * from DemoTable')
    Left = 392
    Top = 42
  end
end